home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 17 / CU Amiga Magazine's Super CD-ROM 17 (1997)(EMAP Images)(GB)[!][issue 1997-12].iso / CUCD / Programming / DiceSource / lib / float / spa_fix.a < prev    next >
Encoding:
Text File  |  1994-02-01  |  528 b   |  27 lines
  1.  
  2.         ;   SPA_FIX.A
  3.         ;
  4.         ;   D0    floating arg
  5.         ;   result integer in D0
  6.         ;
  7.         ;   D2/D3 also saved and restored because I found a bug
  8.         ;   in LVOIEEEDPFix() (37.1), bug has not been tested for
  9.         ;   this function but I am not taking chances.
  10.         ;
  11.         ;   (c)Copyright 1990, Matthew Dillon, All Rights Reserved
  12.  
  13.         section text,code
  14.  
  15.         xref    _MathIeeeSingBasBase
  16.         xref    _LVOIEEESPFix
  17.         xdef    __spfix_a
  18.  
  19. __spfix_a    movem.l D2/D3/A6,-(sp)
  20.         move.l    _MathIeeeSingBasBase(A4),A6
  21.         jsr    _LVOIEEESPFix(A6)
  22.         movem.l (sp)+,D2/D3/A6
  23.         rts
  24.  
  25.         END
  26.  
  27.